object frmCartaoCons: TfrmCartaoCons
  Left = 5
  Top = 118
  Width = 1008
  Height = 604
  Caption = 'Lan'#231'amento de Cart'#245'es'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsMDIChild
  KeyPreview = True
  OldCreateOrder = False
  Position = poMainFormCenter
  Visible = True
  OnClose = FormClose
  OnKeyPress = FormKeyPress
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object DBGrid1: TDBGrid
    Left = 0
    Top = 96
    Width = 1000
    Height = 422
    Align = alClient
    DataSource = DSCartaoDoc
    Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
    TabOrder = 0
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    Columns = <
      item
        Expanded = False
        FieldName = 'CAL_DOCUMENTO'
        Title.Caption = 'Documento'
        Width = 81
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'CAL_DATA'
        Title.Caption = 'Data'
        Width = 52
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'CAL_IDFCARTAO'
        Title.Caption = 'Cart'#227'o'
        Width = 39
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'CAC_NOME'
        Title.Caption = 'Nome'
        Width = 205
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'CAL_LOTE'
        Title.Caption = 'Lote'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'CLP_SEQ_PARCELA'
        Title.Caption = 'Parc.'
        Width = 33
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'CLP_VALOR'
        Title.Caption = 'Valor R$'
        Width = 75
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'CLP_DATA_VENCIMENTO'
        Title.Caption = 'Vencimento'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'CAL_AUTORIZACAO'
        Title.Caption = 'Autoriza'#231#227'o'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'CLP_DATA_RECEBIMENTO'
        Title.Caption = 'Data_Recebimento'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'CLP_VALOR_RECEBIDO'
        Title.Caption = 'Valor_Recebido'
        Width = 81
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'CLP_DESC_ANTECIPA'
        Title.Caption = 'Desc_Antecipa'
        Width = 76
        Visible = True
      end>
  end
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 1000
    Height = 96
    Align = alTop
    TabOrder = 1
    object Label2: TLabel
      Left = 136
      Top = 6
      Width = 46
      Height = 13
      Caption = 'Per'#237'odo'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label7: TLabel
      Left = 227
      Top = 22
      Width = 8
      Height = 13
      Caption = 'a'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label6: TLabel
      Left = 8
      Top = 5
      Width = 85
      Height = 13
      Caption = 'Classificar por:'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label3: TLabel
      Left = 336
      Top = 7
      Width = 38
      Height = 13
      Caption = 'Cart'#227'o'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label1: TLabel
      Left = 240
      Top = 56
      Width = 26
      Height = 13
      Caption = 'Lote'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label4: TLabel
      Left = 368
      Top = 56
      Width = 68
      Height = 13
      Caption = 'Autoriza'#231#227'o'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label11: TLabel
      Left = 8
      Top = 55
      Width = 67
      Height = 13
      Caption = 'Cancelados'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label12: TLabel
      Left = 136
      Top = 55
      Width = 51
      Height = 13
      Caption = 'Situa'#231#227'o'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label13: TLabel
      Left = 512
      Top = 54
      Width = 72
      Height = 13
      Caption = 'Ordenar por:'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object EdtDataInicial: TEdit
      Left = 136
      Top = 18
      Width = 84
      Height = 21
      Hint = 
        'Digite a data sem barras Ex: Voc'#234' digita 010101 e adata fica (01' +
        '/01/01)'
      CharCase = ecUpperCase
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      ParentShowHint = False
      ShowHint = True
      TabOrder = 1
      OnExit = EdtDataInicialExit
      OnKeyPress = EdtDataInicialKeyPress
    end
    object EdtDataFinal: TEdit
      Left = 240
      Top = 18
      Width = 89
      Height = 21
      Hint = 
        'Digite a data sem barras Ex: Voc'#234' digita 010101 e adata fica (01' +
        '/01/01)'
      CharCase = ecUpperCase
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      ParentShowHint = False
      ShowHint = True
      TabOrder = 2
      OnExit = EdtDataFinalExit
      OnKeyPress = EdtDataFinalKeyPress
    end
    object CbData: TComboBox
      Left = 8
      Top = 18
      Width = 121
      Height = 21
      Style = csDropDownList
      ItemHeight = 13
      ItemIndex = 1
      TabOrder = 0
      Text = 'Vencimento'
      Items.Strings = (
        'Emiss'#227'o'
        'Vencimento'
        'Pagamento')
    end
    object BitBtn_Tipo: TBitBtn
      Left = 374
      Top = 19
      Width = 26
      Height = 23
      Hint = 'Pesquisa tipo de pagamento'
      Caption = '...'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 4
      TabStop = False
      OnClick = BitBtn_TipoClick
    end
    object EdtNomCartao: TEdit
      Left = 400
      Top = 19
      Width = 410
      Height = 19
      Hint = 'Exibe a descri'#231#227'o ecf .'
      TabStop = False
      CharCase = ecUpperCase
      Ctl3D = False
      ParentCtl3D = False
      ParentShowHint = False
      ReadOnly = True
      ShowHint = True
      TabOrder = 5
    end
    object EdtCodCartao: TEdit
      Left = 336
      Top = 19
      Width = 38
      Height = 21
      Hint = 
        'Digite a data sem barras Ex: Voc'#234' digita 010101 e adata fica (01' +
        '/01/01)'
      CharCase = ecUpperCase
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      ParentShowHint = False
      ShowHint = True
      TabOrder = 3
      OnExit = EdtCodCartaoExit
    end
    object EdtLote: TEdit
      Left = 240
      Top = 68
      Width = 121
      Height = 21
      Hint = 
        'Digite a data sem barras Ex: Voc'#234' digita 010101 e adata fica (01' +
        '/01/01)'
      CharCase = ecUpperCase
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      ParentShowHint = False
      ShowHint = True
      TabOrder = 8
    end
    object EdtAutorizacao: TEdit
      Left = 368
      Top = 68
      Width = 133
      Height = 21
      Hint = 
        'Digite a data sem barras Ex: Voc'#234' digita 010101 e adata fica (01' +
        '/01/01)'
      CharCase = ecUpperCase
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      ParentShowHint = False
      ShowHint = True
      TabOrder = 9
    end
    object BitClassificar: TBitBtn
      Left = 696
      Top = 60
      Width = 111
      Height = 31
      Caption = '&Classificar'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 11
      OnClick = BitClassificarClick
      Glyph.Data = {
        02030000424D0203000000000000360100002800000013000000170000000100
        080000000000CC010000C30E0000C30E000040000000000000001C3404002434
        1C00242424001C3C0400243C0C00244404002C5C04003C5C240044543C005C5C
        54005C5C5C00646464006C6C6C0054743C007474740044840400747C74007C7C
        7C0084848400449404006C8C540054AC0400000000008C8C8C008C948C009494
        94009C9C9C00A4A4A400ACACAC00B4B4B4006CD404006CDC040074F404007CFC
        040084FC0C0084FC14007CDC24008CFC1C008CFC240094FC240094EC3C0094FC
        2C009CFC3C0094D45C009CF44C009CFC4400A4FC4C00A4FC5400ACFC6400B4FC
        6C00B4F47400BCF48400BCFC7C00B4C4A400ACCC9400BCCCAC00BCC4B400BCCC
        B400B4E48C00BCE49400BCDCA400C4F49400C4FC8C00C0C0C0003F3F3F3F3F3F
        191717193F3F3F3F3F3F3F3F3F003F3F3F3F3F1712111112193F3F3F3F3F3F3F
        3F003F3F3F3F19120E0C0C0E123F3F3F3F3F3F3F3F003F3F3F3F120E0C0B0B0C
        11173F3F3F3F3F3F3F003F3F3F17110C0B0A0A0B0E123F3F3F3F3F3F3F003F3F
        3F12140702010B0B0C11173F3F3F3F3F3F003F3F3F181E1E0F03100C0C0E1219
        3F3F3F3F3F003F3F3F2422231F06080C0C0C11173F3F3F3F3F003F3F2B212223
        221305170C0C0E11173F3F3F3F003F3521222323231E06090E0C0C0E12193F3F
        3F003F2B2223272726221304180E0C0C0E123F3F3F003F2926252A2F2F261F06
        08110E0C0E11173F3F0038302D232C39332E23150311110E0C0E11173F003F39
        2E28383F37312A220F0117110E0E0E1219003F3F373F3F3F3F3A30261E060917
        110E0E1117003F3F3F3F3F3F3F3F322E2315030C1712111217003F3F3F3F3F3F
        3F3F37342D2313001819171719003F3F3F3F3F3F3F3F3F3B342E231300193F3F
        3F003F3F3F3F3F3F3F3F3F3F3C3330230F011D3F3F003F3F3F3F3F3F3F3F3F3F
        3F393E31250F0D3F3F003F3F3F3F3F3F3F3F3F3F3F3F383D312320353F003F3F
        3F3F3F3F3F3F3F3F3F3F3F3F3C2A23363F003F3F3F3F3F3F3F3F3F3F3F3F3F3F
        3F3F373F3F00}
    end
    object CbCancelados: TComboBox
      Left = 8
      Top = 68
      Width = 121
      Height = 21
      ItemHeight = 13
      ItemIndex = 0
      TabOrder = 6
      Text = 'N'#227'o Cancelados'
      Items.Strings = (
        'N'#227'o Cancelados'
        'S'#243' os Cancelados'
        'Todos')
    end
    object CbBaixados: TComboBox
      Left = 136
      Top = 68
      Width = 97
      Height = 21
      ItemHeight = 13
      ItemIndex = 0
      TabOrder = 7
      Text = 'N'#227'o Baixados'
      Items.Strings = (
        'N'#227'o Baixados'
        'S'#243' os Baixados'
        'Todos')
    end
    object CbOrdenar: TComboBox
      Left = 512
      Top = 67
      Width = 169
      Height = 21
      ItemHeight = 13
      ItemIndex = 0
      TabOrder = 10
      Text = '0-Data e Cartao'
      Items.Strings = (
        '0-Data e Cartao'
        '1-Data e Lote'
        '2-Data e Autoriza'#231#227'o'
        '3-Lote'
        '4-Autorizacao')
    end
  end
  object Panel2: TPanel
    Left = 0
    Top = 518
    Width = 1000
    Height = 52
    Align = alBottom
    TabOrder = 2
    object Label5: TLabel
      Left = 9
      Top = 8
      Width = 100
      Height = 13
      Caption = 'Total Vendido R$'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label8: TLabel
      Left = 123
      Top = 8
      Width = 114
      Height = 13
      Caption = 'Total Descontos R$'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label9: TLabel
      Left = 248
      Top = 8
      Width = 113
      Height = 13
      Caption = 'Total a Receber R$'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlue
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Bevel1: TBevel
      Left = 498
      Top = 1
      Width = 4
      Height = 50
    end
    object Label10: TLabel
      Left = 368
      Top = 8
      Width = 108
      Height = 13
      Caption = 'Total Recebido R$'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clGreen
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object BitSair: TBitBtn
      Left = 876
      Top = 9
      Width = 119
      Height = 36
      Caption = '&Sair'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 0
      OnClick = BitSairClick
      Glyph.Data = {
        76030000424D7603000000000000360000002800000011000000100000000100
        18000000000040030000C30E0000C30E00000000000000000000BFBFBFBFBFBF
        BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF000000BFBF
        BFBFBFBFBFBFBFBFBFBFBFBFBF00BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
        BFBFBFBFBFBFBFBFBFBFBFBFBFBFBF0000FF000000BFBFBFBFBFBFBFBFBFBFBF
        BF00BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
        BFBFBF0000FF0000FF000000BFBFBFBFBFBFBFBFBF00BFBFBF00000000000000
        00000000000000000000000000FF0000FF0000FF0000FF0000FF0000FF0000FF
        000000BFBFBFBFBFBF00BFBFBF000000FFFFFFFFFFFFFFFFFFFFFFFF00000000
        00FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF000000BFBFBF00BFBF
        BF000000FFFFFFFFFFFFFFFFFFFFFFFF0000000000FF0000FF0000FF0000FF00
        00FF0000FF0000FF0000FF0000FF00000000BFBFBF000000FFFFFF0000000000
        00FFFFFF0000000000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF00
        0000BFBFBF00BFBFBF000000FFFFFFFFFFFFFFFFFFFFFFFF0000000000FF0000
        FF0000FF0000FF0000FF0000FF0000FF000000BFBFBFBFBFBF00BFBFBF000000
        FFFFFF000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000000000FF0000
        FF000000BFBFBFBFBFBFBFBFBF00BFBFBF000000FFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFF0000000000FF000000BFBFBFBFBFBFBFBFBFBFBF
        BF00BFBFBF000000FFFFFF000000000000FFFFFF000000000000000000000000
        000000000000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBF00BFBFBF000000FFFFFFFF
        FFFFFFFFFFFFFFFF000000FFFFFFFFFFFF000000BFBFBFBFBFBFBFBFBFBFBFBF
        BFBFBFBFBFBFBFBFBF00BFBFBF000000FFFFFF000000BFBFBFFFFFFF000000FF
        FFFF000000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF00BFBF
        BF000000FFFFFFFFFFFFFFFFFFFFFFFF000000000000BFBFBFBFBFBFBFBFBFBF
        BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF00BFBFBF0000000000000000000000
        00000000000000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
        BFBFBFBFBF00BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
        BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF00}
    end
    object BtnRelatorio: TBitBtn
      Left = 518
      Top = 9
      Width = 119
      Height = 36
      Caption = '&Relat'#243'rio'
      Enabled = False
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 1
      OnClick = BtnRelatorioClick
      Glyph.Data = {
        EE030000424DEE03000000000000360000002800000012000000110000000100
        180000000000B8030000C30E0000C30E00000000000000000000BFBFBF000000
        000000000000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
        BFBFBFBF000000000000000000BFBFBF00000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        00000000000000000000000000FFFFFFC0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0000000
        0000000000FFFFFFC0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C00000000000000000FFFFFF
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C00000FF0000FFC0C0C0C0C0C00000000000000000FFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFF000000000080808000000000000080808080808080808080808080
        8080808080808080808080808080808080808080808080000000000000808080
        0000BFBFBFBFBFBF000000000000000000000000000000000000000000000000
        000000000000000000000000000000000000BFBFBFBFBFBF0000BFBFBFBFBFBF
        000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFF000000000000BFBFBFBFBFBF0000BFBFBFBFBFBFBFBFBF000000FFFF
        FF000000000000000000000000000000000000000000000000FFFFFF000000BF
        BFBFBFBFBFBFBFBF0000BFBFBFBFBFBFBFBFBF000000FFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000BFBFBFBFBFBFBFBFBF
        0000BFBFBFBFBFBFBFBFBF000000FFFFFF000000000000000000000000000000
        000000000000000000FFFFFF000000BFBFBFBFBFBFBFBFBF0000BFBFBFBFBFBF
        BFBFBF000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFF000000BFBFBFBFBFBFBFBFBF0000BFBFBFBFBFBFBFBFBF000000FFFF
        FF000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000BF
        BFBFBFBFBFBFBFBF0000BFBFBFBFBFBFBFBFBF000000FFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000BFBFBFBFBFBFBFBFBF
        0000BFBFBFBFBFBFBFBFBF000000000000000000000000000000000000000000
        000000000000000000000000000000BFBFBFBFBFBFBFBFBF0000BFBFBFBFBFBF
        BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
        BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF0000}
    end
    object BtnBaixaIndividual: TBitBtn
      Left = 637
      Top = 9
      Width = 119
      Height = 36
      Caption = '&Baixa Individual'
      Enabled = False
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 2
      OnClick = BtnBaixaIndividualClick
    end
    object BtnBaixaSelecao: TBitBtn
      Left = 756
      Top = 9
      Width = 119
      Height = 36
      Caption = '&Baixa Sele'#231#227'o'
      Enabled = False
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 3
      OnClick = BtnBaixaSelecaoClick
    end
    object StTotVendido: TStaticText
      Left = 9
      Top = 21
      Width = 103
      Height = 19
      Alignment = taRightJustify
      AutoSize = False
      BorderStyle = sbsSingle
      Caption = '0,00'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 4
    end
    object StTotTaxas: TStaticText
      Left = 123
      Top = 21
      Width = 113
      Height = 19
      Alignment = taRightJustify
      AutoSize = False
      BorderStyle = sbsSingle
      Caption = '0,00'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 5
    end
    object StTotaReceber: TStaticText
      Left = 251
      Top = 21
      Width = 110
      Height = 19
      Alignment = taRightJustify
      AutoSize = False
      BorderStyle = sbsSingle
      Caption = '0,00'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 6
    end
    object StTotRecebido: TStaticText
      Left = 371
      Top = 21
      Width = 110
      Height = 19
      Alignment = taRightJustify
      AutoSize = False
      BorderStyle = sbsSingle
      Caption = '0,00'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 7
    end
  end
  object SQLC_ConsLanCartoes: TSQLClientDataSet
    CommandText = 
      'select CARTAO_LANCAMENTO.CAL_IDFDOCUMENTO'#13#10'     , CARTAO_LANCAME' +
      'NTO.CAL_DOCUMENTO'#13#10'     , CARTAO_LANCAMENTO.CAL_DATA'#13#10'     , CAR' +
      'TAO_LANCAMENTO.CAL_IDFCARTAO'#13#10'     , CC.CAC_NOME'#13#10'     , CARTAO_' +
      'LANCAMENTO.CAL_VALOR'#13#10'     , CARTAO_LANCAMENTO.CAL_LOTE'#13#10'     , ' +
      'CARTAO_LANCAMENTO.CAL_AUTORIZACAO'#13#10'     , CARTAO_LANCAMENTO_PARC' +
      'ELAS.CLP_SEQ_PARCELA'#13#10'     , CARTAO_LANCAMENTO_PARCELAS.CLP_VALO' +
      'R'#13#10'     , CARTAO_LANCAMENTO_PARCELAS.CLP_TAXA'#13#10'     , CARTAO_LAN' +
      'CAMENTO_PARCELAS.CLP_DATA_VENCIMENTO'#13#10'     , CARTAO_LANCAMENTO_P' +
      'ARCELAS.CLP_DATA_RECEBIMENTO'#13#10'     , CARTAO_LANCAMENTO_PARCELAS.' +
      'CLP_VALOR_A_RECEBER'#13#10'     , CARTAO_LANCAMENTO_PARCELAS.CLP_VALOR' +
      '_RECEBIDO'#13#10'     , CARTAO_LANCAMENTO_PARCELAS.CLP_DESC_ANTECIPA'#13#10 +
      'from CARTAO_LANCAMENTO_PARCELAS CP'#13#10'left join CARTAO_LANCAMENTO ' +
      'CL on CL.CAL_IDFDOCUMENTO = CP.CLP_IDFDOCUMENTO'#13#10'left join CARTA' +
      'O_CADASTRO CC on CL.CAL_IDFCARTAO=CAC_CODIGO'#13#10
    Aggregates = <>
    Options = [poAllowMultiRecordUpdates, poAllowCommandText]
    ObjectView = True
    Params = <>
    DBConnection = DtmGeral.ConexaoBanco
    Left = 280
    Top = 176
    object SQLC_ConsLanCartoesCAL_DOCUMENTO: TStringField
      FieldName = 'CAL_DOCUMENTO'
      Required = True
      Size = 13
    end
    object SQLC_ConsLanCartoesCAL_DATA: TDateField
      FieldName = 'CAL_DATA'
      Required = True
      DisplayFormat = 'dd/mm/yy'
    end
    object SQLC_ConsLanCartoesCAL_IDFCARTAO: TStringField
      FieldName = 'CAL_IDFCARTAO'
      Required = True
      Size = 10
    end
    object SQLC_ConsLanCartoesCAC_NOME: TStringField
      FieldName = 'CAC_NOME'
      Size = 35
    end
    object SQLC_ConsLanCartoesCAL_VALOR: TFMTBCDField
      FieldName = 'CAL_VALOR'
      Required = True
      DisplayFormat = '###,###,###.00'
      Precision = 15
      Size = 3
    end
    object SQLC_ConsLanCartoesCAL_LOTE: TStringField
      FieldName = 'CAL_LOTE'
      Size = 13
    end
    object SQLC_ConsLanCartoesCAL_AUTORIZACAO: TStringField
      FieldName = 'CAL_AUTORIZACAO'
      Size = 13
    end
    object SQLC_ConsLanCartoesCLP_SEQ_PARCELA: TIntegerField
      FieldName = 'CLP_SEQ_PARCELA'
      Required = True
    end
    object SQLC_ConsLanCartoesCLP_VALOR: TFMTBCDField
      FieldName = 'CLP_VALOR'
      Required = True
      DisplayFormat = '###,###,###.00'
      Precision = 15
      Size = 3
    end
    object SQLC_ConsLanCartoesCLP_TAXA: TFMTBCDField
      FieldName = 'CLP_TAXA'
      Precision = 15
      Size = 3
    end
    object SQLC_ConsLanCartoesCLP_DATA_VENCIMENTO: TDateField
      FieldName = 'CLP_DATA_VENCIMENTO'
      Required = True
      DisplayFormat = 'dd/mm/yy'
    end
    object SQLC_ConsLanCartoesCLP_DATA_RECEBIMENTO: TDateField
      FieldName = 'CLP_DATA_RECEBIMENTO'
      DisplayFormat = 'dd/mm/yy'
    end
    object SQLC_ConsLanCartoesCLP_VALOR_A_RECEBER: TFMTBCDField
      FieldName = 'CLP_VALOR_A_RECEBER'
      Required = True
      DisplayFormat = '###,###,###.00'
      Precision = 15
      Size = 3
    end
    object SQLC_ConsLanCartoesCLP_VALOR_RECEBIDO: TFMTBCDField
      FieldName = 'CLP_VALOR_RECEBIDO'
      DisplayFormat = '###,###,###.00'
      Precision = 15
      Size = 3
    end
    object SQLC_ConsLanCartoesCAL_IDFDOCUMENTO: TIntegerField
      FieldName = 'CAL_IDFDOCUMENTO'
    end
    object SQLC_ConsLanCartoesCLP_DESC_ANTECIPA: TFMTBCDField
      FieldName = 'CLP_DESC_ANTECIPA'
      Precision = 15
      Size = 3
    end
    object SQLC_ConsLanCartoesValoraReceber: TFloatField
      FieldKind = fkInternalCalc
      FieldName = 'ValoraReceber'
    end
    object SQLC_ConsLanCartoesDescontos: TFloatField
      FieldKind = fkInternalCalc
      FieldName = 'Descontos'
    end
  end
  object DSCartaoDoc: TDataSource
    DataSet = SQLC_ConsLanCartoes
    Left = 120
    Top = 200
  end
  object RvPLanCartao: TRvProject
    Engine = DtmGeral.RvS_Relatorios
    Left = 641
    Top = 424
  end
  object RvDSLanCartao: TRvDataSetConnection
    RuntimeVisibility = rtDeveloper
    OnOpen = RvDSLanCartaoOpen
    DataSet = SQLC_ConsLanCartoes
    Left = 785
    Top = 464
  end
  object SQLC_Cartao_Parcelas: TSQLClientDataSet
    Aggregates = <>
    Options = [poAllowCommandText]
    ObjectView = True
    Params = <>
    Left = 424
    Top = 184
  end
end
